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The Acorn Atom may mo longer be in production, but the drop in 
price of the basic 2+8k machine to less than #100 seems to have 
stimulated users to think expansion. There are various hoards 
available, memory expansion, RS@32-C (from PLB); and disk 


controller for example. Typicelly these boards cost from $20 for 
a bare RS2Z32-C0 board, through $35 for a memory expansion or 
floppy disk controller card (bare, with parts list and 


directions), up to #170 for a working RS2Z32-0 complete with 
software or $200 for an FDC card assembled ard tested complete 
With blenk EPROM. If you want more information on these items, 
which are available from different members, send a stamped 
addressed envelope to me and I will pass it oan to the 
appropriate member. Please note that these are mot aveilanle 
from the Users’ Group, but are being offered by individual 
MEMDaTS. 


I would like to thank all those who have sent in material for 
the Newsletter, It is all greatly appreciated., If you have an 
item for publication it can be forwarded in many different ways. 
On disk: or cassette, as crisp black copy ready for printing or 
in any readable form, or posted as a text file on the Burlington 
bulletin board Tel.(416) 632-8653. If you send ait on gisk or 
cassette please do mot include special printer control cades,. 
Disks and cassettes will, of course be returned. If you past it 
op the BES it is not necessary to format the text. Enter it just 
as you would in Word-Pack typing return» only at the end of a 
paragraphs To signify the end of the text type "/k". The BES is 
mer driven. To send 8 message reply to the prompts with single 
letter replies as follows: 

JE Enter Mail} <C> Create Messsqe} <8> Save Message} at this 
point you will be aked for a 3 character code, reply <JCW>. To 
sien off type <ሸ> Previous Meraj <T> Terminate, 


John Wood 
February 1984 


This Newsletter is published by Atom Users’ Group Canadas 
812 Cabot Trail, Milton, ONT. L&T BMB for the benefit of members 
of the Group, 





Communications 
D Zero Cost Serial Interface 


One of the most exciting fields in microcomputing today is that 
of communicating with the outside world. Exchanging data with 
other computers and accessing the many bulletin board systems 
that have sprung up really widens your horizons. 


In an earlier Newsletter we carried a schematic and program 
listing for a full ቪከ5232-ር interface for the Atom. Elsewhere in 
this issue you will find corrections to this. The corrections 
were posted to John Wood on a BBS in Toronto by Drew Nisbet the 
author of the original article im InfoAge. The message was then 
downloaded to an Atom in Milton, massaged through Word-Fack and 
Printed out as you see it. 


The programs listed below enable the Atom to generate serial 
data suitable for transmission via a modem. No RS23Z-C board is 
required. The program emulates the ከ5232 using the VIA chip and 
the central processor. Transmitted data is found on PRO, that is 
Pin 10 om the first row of holes on FLS (start counting from the 
side of the Atom). Received data is input to PRL (pin F on Phó). 
The ground for these lines can be taken from pin 32 also on PLë, 
The sionals are in TTL logic, that is "i" is +50 and "O" is OV. 
Some but mot all modems will accept these signals directly. The 
system is working very well op an acoustic coupler purchased for 
$28.00. Some of these can still ከፎ found lurking about irn dusty 
corners around Queen Street in Toronto. (Try Active Surplus). 
Surplustronics also have some but these have been removed from 
their great clumsy cases and put im meat little boxes, so they 
cost twice as much. Note that although these operate on TTL 
logic they do require +12V end -12V for operation. Also they are 
"originate only" mode, which means that they are fine for 
sending and receiving data to and from bulletin boards, or 
exchanging date with another computer equipped With an 
“originate/answer" modem. But, they cannot communicate directly 
with each other. | 


No apology is made for the untidy structure of the programs. The 
only justification is that it is guaranteed ta he a working 
versions The main program "comm" requires a lookup table. This 
is provided by first running LOOKUP. The versions given require 
a 42 +12k Atom with VIA chip, but they are written in such a way 
that it is fairly simple to patch them to make use of memory 
expansions. Again, as written only text files up to 254 (100 
hex) characters long can be generated in Word-Fack for 
subsequent transmission. However, much longer files can be used 
if "comm" 35 first rum to produce the machine code, the tex 

file is then loaded and "comm" is entered by LINK #3A00. Tf you 
do this you will have to make a separate program of lines 
1350-1450 to reprint text downloaded to memory. If you wish to 
create longer files with Word-Fack, you will find that you have 
to save it ae "FILNAM", <BREAK> to get out of WeP Lien xLOAD 
METLNAM", This is to avoid the ዌኳ3ሏቲሮከ which occurs at #2900 and 
#2901 when you push <EREAKS, 


trade off in using 

code. It does mot leave the CFU 
You cannot send and receive 
although you will pick 
enough time for the program to 
are received but they will De 


There is 8 


text. You will find that the 
normal way. The text always pri 
the previous page as it does so. 


REM comm 

REM NEEDS LOOKUP TABLE AT #8200 
DIME ዳን ,LL¢22),NNC109,99010) 
ኮዮ=ቆ3ል00 ` 


a character 
up the echo wher you type. 


ፃ0፪ 
10 05,141 
440 5፥ህህ2 
420 STA 
130 STA 
140 LDA 
150 


2103005 
220 CMF 
230 STA 
240 INC 
250 INC 
260 ፥#ህህሬ 
2703LL1 
280 ፥1.ሁ.2 
290 AND 
300 JMF 
ኃቷ0ኣ 


WR 
E, ፲= 
ሦዮ,ቆ3ፎሯፎቆጋዐቆሯጊ 


FE, Lal TO 23; P=#3A00 


0 TO 


Ké, 


22ILLCTIHF INI 
ዐ TO 10 5ዘክ‹(፲ ኔን=።ኮ ነ ህህ(፲ ንመጫምዮንከን I 


NOF 

LDA WO 

FESOC STA ቆፎ8ዐዐ ፡ኳፐፅ FAG 

+30 STA ቆፀ1 ፥ዉፐፅ FBZISTA FAB 
BISTA ቆዞፀ02 

BAJ STA ቆፅ0 

29480 516. ቆፅ7 

ወቆፀ3፥5ፐፅ #83 

@#283STA FAF 

JSR LL 

RTS 

LDY @O03LDA ‹ቆፅ8).ኘ 

BASEER ህህዳ 
$903 JSR FESZ 
FASENE ህህሪ 
FA? 

JMP JUS 

LDA @#3F3JUSR FESZ 
LDA #8800 

@Z;BEQ LLANNO REC, 
LLi4 


JER LLLI 


DATA 


320\ CHECK FOR KEYED DATA AND SEND 


330 3LL4 
340 CRY 
350 CRY 
340 JSR 
3703LLS 
380 AND 


390 Trei 


400 JMP 
410 ነዚኒዚሬ 
420 AND 
430 CFY 
440 BNE 
450 JSR 
460 LDA 
470 LDA 


JSR #FE71 SCAN KEYEQARD 
@2Z55;BEQ LLZ NO KEYFRESS 
SOENE LLS IF ESC KEY (ERK) 


LLZO;JSR LLIOFRTS 

LDA #6001 CHECK FOR SHIFT 
@1iZ8;BNE LL 

CLOZADC Bei ADD OFFSET 


LL? 

LDA #68001 CHECK 
@643;BNE LL10 
@4\IF CTRL-“ (UPLOAD FROM WF) 
013 ; 

.[20 ,ህ8፳ LLIF JSR ህህ5 

BO STA FAG 

ወቆ።8፤8ፐፅ FA? UMP LL13 


FOR CONTROL. 


the 6502 to generate the serial 
much time to do anything else. 
at the same instant, 
There is mot 
react to control codes as they 
stored in memory along with the 
screen does not scroll in the 
nts down the screen over-writing 


4807LL3 CRY BANIF CTRL-C (DOWNLOAD) 
490 BNE LL? 
“00 LDA PLI STA #80\SET DOWNLOAD 
210 STA #B1NSET MEMORY FIAG 
S20 JSR LLZOSJSR LLI6\FRINT 
530 JSR LLAGZ UMP L113 
“4O03LL7 CRY @3N\CHECK 
550 BNE LLB 

760 LDA ወዐነ55ፐፅ #80\TURN OFF DOWNLOAD 
870 JSR LLZOSUSR LLI6\PRINT "OK" 
S80 JSR LLAGZ UMP LL13 
5ቅ0፥1..ቄሀ8 TYASCLOSADC @120 ADD OFFSET 
6003LL9 TAY 

GLOULL1iO LDA #€8200,Y\GET ASCII 
620 STA #903; JSR #FES2 

630 JSR LLI9} JSR LLAL; UMP LL4 
6403 NNINDELAY ROUTINE 

650 STX #AL3STY #A43LDY PLO 
GAL NN LDX #A0 
6703NN3 DEX} ENE 
ሪ8ዐ፥አክክዘቶ DEY} RENE 
690 LDX #A1LSLDY 
700 RTS 
FALOSLLAINPRINT ROUTINE ፡ 
720 LDA BPI STA ቆጾ800፤ህ5ጾ NNINSTART BIT 
730 LDA @13STA #AZ3LDX @7 
740NINITIALISE FARITY AND BIT COUNT 
750 LDA #903STA #A3 
7é603NN10 AND BLSEOR #A23STA FAZ 
770 LDA #A33AND @LZEOR Gi 
780 STA #68800; JSR NN) 

790 ROR #AS3 LDA #A3 

800 DEXSENE NN1O 


FLAG 


"OK 


IF ርፐክኢኪ-፦3 


NN? 
NMZ 
EAG 


830 LDA FAZ STA #8800 

820 JSR NNINPARITY EIT 

830 LDA BO STA 85800 

840 JSR NNINSTOP EIT 

850 JSR NNIS JSR NNIS JSR NNI 
Bél LLZ RTS 

8705፥1[1:43 

889 LDA 8፳03ቪኪ0ኘ @OS JUMP LL4 
B9ON 


POOTLLA4 STX #€ALSSTY #A4j3LDY ወ= 
910 JSR NN2ZN HALF DELAY 

920 LDA #E8003;AND @23ENE LL? 
930 JMF LLANNOT A START EIT 
ዋዳ0፥1ጊ1..417 LDA BO STA HASZLDX Gg 





950፥1.ቄህ.45 JSR NNI 


960 LDA #BBO0SAND ወሯ፥ፎዐክ @2NSELECT BIT 


970 ILSR ASLSR ANSTORE IN CARRY FLAG 
980 ROR #AS\ADD EIT TO BYTE 

990 DEX ENE LLAS 

1000 |LDY @46; JSR NN2 

4010፤ከከክፃ LDA #ASSAND @#7F3STA #AS 
LOZONIGNORE PARITY EIT 


1030 SECISEC ወቆ።ዐ ክፎ8ዷሻ፲ NNS\CONTROL CODES 
1040 SECI SEC @#Z0;BMI NN6é\NOS, & FUNCT. 


1050 SECSSEC @#20;EMI NN7\G@~4 

4069 LDA FAS CLEC ADC @#20; UMP NNB 
40701ከከ5 LDA @#20; IMF NNE 

1080፤፣ከከክሬ LDA #A53 JUMP NNB 

LO90%NN7 LDA #ASSSECSSEC ወቆዓ0ህቨክቨዮ NNB 
140ዐ፣፻ክክፀ LDY @O;STACHAG),Y 


1110 INC FAG ENE LLZININCREMENT POINTER 


1120 LDA #A73EOR BIL STA #A7 

1430 ፤11ፅ..141 LDY #80;3CFY @0 

1140 REQ LLIS\NOT DOWNLOADING 

1150 |LDY @O3LDA FAS STA (#82),Y 
1160 LDA #82;CLCSADC QI STA #82 
1170 ENE LLAIS\NOT CARRY 

1180 LDA #83;3CLCSADC @13STA #83 
1190 (CMP @#98;8NE LLIS\FREE MEMORY 
1200 LDA GO STA #80\STOF DOWNLOAD 


"comm" Program Notes 


The following locations are used 
in the program, 

ግ80 Download flag 

Dee Memory use flag 

ግ82-ቓ83 Fointer for download 
790 Storage for byte to send 
?#A0 Delay to set baud rate 
IAL Temp. storage for X 
ግዌልፅ2 Storage for parity bit 
2ቁፅ3 Temp. storage for byte 
2kA4 Temp. storage for Y 

7ቹፅ5 Received byte 

?#AG-#A7 Screen pointer 
ግቐልፅ8-ቕፅዋ Upload pointer 


All of these except the pointers 
could be moved off zero page if 
raquired. 

If the look-up table is 
cated, change line 610 
new base address. 


relo- 
for the 





1210:18 LDA #B8003AND @2Z;ENE LLIB 
1220 JMP LL4 

1230y 1 

L240\ SUBROUTINE TO PRINT "OK" 
L2503LL16 LDA @#4F ASCII "0" 

1260 JSR #FES2 

1270 LDA ወቕዳ5፤ህ5ክ #FES2Z ASCII "K" 
12801111,.20 LDA @#A3 JSR #F E52 

1290 LDA QFD} USK ቆዞፎ5።2 ፤ዚክፐኣርጽ 
L30Q03LL19 JSR FEZI CPY ወ25515ከ5 LL19 
1310 RTS\KEY RELEASED 

13203 

1339 አን፲4ዮንቆይ፥ቪኪችእ Jl 

1340 ፲፻ ?#81e>13 END 

1350 @=O03F.¢12"DATA STORED FROM " 
1360 F."#8300 TO €U& CPEB 2425 46K? $83) '' 
1370 INFUT"FRINT OUT" SE 

1380 IF ቆጾ="ከክ” OR $6="NO"3END 
L3908INFUT"HARD ርዐኮዮኘ”ቆፎ 

1400 IF¢6="Y"OR $Es "YES" SF. ቆሯቆሯኋ 

1410 FOR ፲=ቆ8300 TO (?#824+2546x?#83)~1 
1420 PPPI N.I} F.” $3856 

1430 INFUT"FRINT AGAIN SE 

1440 IF $¢6="Y"ORSB= "YES" GOTOES 

1450 @=8; END 


10 REM NON SHIFTED ASCII TABLE 
20 !ሕ8200=ቆ#503ር02820 ) '#8204=406809005EF 
30 !ቆ8208=ቆ000000004 '#820C=#00000D00 
40 !ቆ821 0=ቆ#33323130) !#8213ዳ=ቆ3ፖ7363534 
50 !ቆፀ218።፡ቆ353ል3738 ) ! #821ርቆ2፣2ዩክሯዐ2ር 
60 !#8220=ቆዳዓ3424140 ) SE E KEE GE E 
70 !ቆ8228=ቆዳይዳጳሳሃፍዳ8፤ነ !#822ር=ቕዳዞኮዳ5ዳ0ዳር 
80 !ቆ8230=8#2322515=0 3 '48234=457565554 
90 !ቆ8238።ቆ1385ል5958 
409 REM 
110 REM SHIFTED ASCII TABLE 
120 !ሕ823ር=፡፡ቕፖዕፖር7820 ፤ ! ሕ8240=#0ል08007ዩ 
130 !#82ዳዓዳ፡=፡ቆ00000000ነ ! #8248=ቆ5=ዮ000ሀ00 
140 !ቆ82ዓር፡፡ቆ232221 30 ; ! #8250=ቁ2726252ዳ 
150 ! ቆ825ዳ፡፡ቆ252ል2928 ) ! #8Z258=#3F SE3D3C 
460 !ቆ8235ር፡፡ቆሪ3ሪ261ፊ0 ፤ '48260=#67666564 
470 !ቆ8ረፅሬዳ=ቆሪዕፀጾሬጳሬዋሪፊ8ነ ! #8268=#€6F 6E6D6C 
180 '#826C=#737271703 '#8270=#77767574 
4790 '#8274=#1E7A7978 
200 REM 
210 REM CNTL ASCII TABLE 
220 !ቆ8278=ቆ00000000 1 '#827C=#00000000 
230 !#$8280=£000000003 '#8284=#00000000 
240 !#$8288=#000000003 '#828C=#00000000 
250 !#8290=#000000003 '#8294=#00000000 
260 !#8298=£030201003 '#829C=4#07560504 
270 !ቆ82ፅ0=ቆ050ልጳ090ይነ l #8ZA4=#0F DEODOC 
280 !#82A8=#131211103 !482AC=#171461514 
290 82602400141218 
300 END 
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ASSEMBLER SCREEN DUMF ROUTINE: 


Screen dump routines are a FAIN! The problem with trying to get 
graphics 4 onto a printer is that the bytes which form the 
screen memory are stored horizontally as you look at its: that 
is, The first byte of screen memory, #8000, represents the top 
left eight dots, Y=191, X=0 to 7. But since the print head ወስ 
mast dot matrix printers is a vertical series of pins, bytes 
sent to the printer from the screen must represent a vertical 
column of dots, which, for the first byte of information, would 
represent bit 7 of the first byte on the top eight lines. Sounds 
complicated, but a Basic program to translate horizontal bytes 
into vertical bytes isn’t terribly so. But. A Basic graphics 4 
screen dump will take more than five long, dragging minutes. On 
the other hand this Assembler program to dump graphics 4 to 
Gemini 19x printer is somewhat complicated, but has the virtue 
of taking about 37 seconds to complete its job. This will save 
you 45 minutes for every 10 screen dumps. 





NOTES: 


This program is #E2 bytes long and will fit neatly into any page 
of memory. I like #2800 to #2900 for such things, unless I am 
using floating point statements, in which case I might us 
#3B00-#3C00. The program is self contained, so a LINK to #2800 
will set ?#HFE, turn on the printer, dump the screen at the 
middle of the page in normal-density mode, reset the printer and 
turn off the output. The routine will print out the screen AS 
YOU SEE IT, with no need to reverse it. 


After you have entered the Assembler program, by all means save 
it, but there is no need to tack it on to every program 
requiring a screen dump. Just *SAVE the code from where the Atom 
has placed it, eg: x*SAVE "DUMF" 2800 28ፎ=2., It may then be 
KLOADed back without your having to reassemble it every time. By 
changing ም in line 130, you can assemble the code in a number of 
Places and have the code ready to *SAVE and XLOAD whenever you 
want it. The screen printout you see at the top of this article 
was ERUN into #3B00. 








This routine uses 10 bytes in zero page, #80-#89. If the program 
calling it also uses this space and will loop back after the 
dump, the addresses must be reset. Alternatively, you might use 
#90-#99. The toolbox ROM also uses part of this space and might 
be confused by the values left behind. 


#FEFB is the start of the ROM routine to send the byte in the 
accumulator to the printer. If 2 or 2 are in the accumulator, 
they won*t get to the printer, as the Atom uses these characters 
to turn the printer output on and off. Whenever I need to send 
these particular numbers, I use 1230 and 131.The eighth (high) 
bit is unused in printer output, so offsetting by 128 will allow 
us to send these troublesome digits. Hecause an accidental value 
of 3 could turn off the output, I have made sure that the byte 
sent to the printer at least starts at 128, then increment it as 
required. Lines 360-630 are used to clean off the row of dots 


representing #9900-#981F. 


Gemini 10x graphics are printed with the high bit at the top of 
each column. Other printers, such as Centronics, will have the 
low bit in this position. Conversion should not be difficult. I 
cannot test the results, but I should think the following 


changes will do the trick: 


K220LDAG1; STA#BS 

K240-320: These are Gemini control codes which must be 
changed to match those on your own printer. These set left 
margin, line spacing and (at VVO) set to graphics normal density 
mode. 

KSFOLDAGI 

ጁ470፣፤ VV4ASL#82 

KS45CMPG128 


X630ANDEG191 
*930-940: Gemini code to reset the printer before exiting 


the routine. Insert your own printer’s reset codes here. 
Strictly speaking, you may leave these lines out, but subsequent 
printing will be messed up by the too-short line feed values and 


too-large left margin. 


There may be other patches required. If you work them out, 
please send them to John Wood. 
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screen dump 
xxXin assemblerx* 
by John Lasruk 
(for Gemini 10x) 


LOODIMVV1O 
110F. $21 
20F.G6=0T010:3 VV (5) =-1 ፲፪ ከ1. 
1370F. 5=1102፣ P=#2800 
140C 
LSOLDABS; STA#FE 
10L DARZ; JSR#FEFB 
17OLDABO: STA#80 
1BOSTAHB1: STAKES 
L9OLDAGHBO: STAHBS 
ZOOS TAKB4 ፤ STAHBO 
ZLOLDABH2ZO;: STA#HB2 
22OLDABH4Os STAKBS 
=2OLDABHCO;: STA#87 
<40LDAB27; JSR#FEFE 
S5OLDAG77: JISR#FEFB 
260LDAB20: ISR#FEFR 
=/7OLDAG27; JSR#FEFB 
=8S0LDAG6S: JSR#FEFB 
S9OLDABS6: JSR#FEFB 
200:VV0O LDAB27; JSR#FEFR 
ZLOLDAG7S; JSR#FEFB 
S20LDABO; JISR#FEFB 
ZSOLDAG1: ISR#FEFR 
240L DA#B6: STA#81 
ZOOL DA#BS: STA#80 
S60LDYRO 
2703 VV2LDA#89 
3B0STA#SS 
Z9OLDAG64 
400STA#EB3 
410: VV2LDA (#80) , Y 
420: VVOAND#B4 
430BNEVV4 
440LDA#8E 
45 ዐጽጳ#8= 


- ዳ4ዳሬዕፐጳ#ፀ8 


470: VV4LSR#83 
480ር ር 
490LDA#BO 
SOOADC#HSE2 
SLOSTA#BO 
SZ20BCCVVS 
SSOINC#B1 
540: VVSLDA#82 
SSOBNEVVS 
SSOLDA#BSE 
S7OCMPGRY7 
SBOBNEVV7 
SIOLDAKBS 
S00CMPEH4O 
S&10BNEVV7 


ሬ=ዕ .[ህሰ#8፳፪ 
S30ANDGHFE 

S640 IMPVV1O 

650: VV7LDA#88 
660: VVLOJSR#FEFB 
6&70OLSR#84 
ABOLDA#86 
S90STAKBI 
7OOLDA#SBS 
71ዕ5ፐጳጃ8(0 
72O0LDA#B4 

7 20BNEVV2 
740LDAB128 
7SOSTAB4S 

7ሬዕ፲ከሃ 

77OCFYGS2 
7BOBNEVV2 
79OLDABIZ 
SQQOJSR#FEFB 
SLiOLDAGIO 
820OJSR#FEFER 
BIOLDA#B87 

B840CLC 

850ADC#85 
S40STA#SS 
ወ7ዕጀርርሃሃሬ 
ፀፀጋ፲አር#ልሬ 

B90: VV6LDA#BS 
ዓዕዕርቫዮወ#ዋ8 

91 0OBEQVV8S 
F29JMFYVO e 
920: VVBLDAG27: JSR#FEFB 
940LDAB64: JSR#FEFE 
SSOLDAGZ: JSR#FEFB 
960O0RTS 

2703 

ግ8ዕክ, P, ቆሬ 

990END 











SUPEREASTIC TOOLKIT 


The Superbasic Toolkit is available from MicroPower, 5 Wenslaey 
Road, Leeds, ኪ87 2LX, England at a price of £14.50. According 
to the manufacturer, this is the final in the series of toolkits 
for the Atom, It is said to contain most of the original 
toolkit commands, Cit doesnt); and a bunch of new ones, (It 
Goes). 


The chip is installed ain the auxillary ROM socket and is 
accessed by LINK #AF00 if you wish the 1200 Baud cassette system 
or LINK #AF04 for the 300 Baud, 


As well as the additional EASIC commands, several meat extras 
are provided as well, as follows. 


CA) The Atom bug of printing an error message after control 
keys has been eliminated, 


(Bi Several error directives have heen corrected, 


ርርን When an error oceurrs in Superhasic, the Line mumber is 
printed, and the cursor hiaghliahts the possible area of the 
error. 


New Basic Commands 


LOCOS 300 Esud cassette 

HICOS 4200 Baud cassette 

LEFT $ 

RIGHTS Standard Microsoft string handling routines 
MID | 

INSTR 

READ 

DATA 

RESTORE 

WHILE/ENDWHILE Inverse of DO/UNTIL 


FWHILE FFs. version 

XIF-THEN-ELSE Structured version of TIF-THEN 

XFIF FF. version af above 

ON (GOTO/GOSUEB}) 

INKEY Scams keyboard for keypress. 

BEEF, X,Y Sounds tone of freq. X; duration Ye 

STOF Stops program at desired point. Any key rastarts 
ZERO Zeros all variables 

RESET Fops loop and SR stacks allowing jump auts 
ERR Returns error +È 

ERL. Returns Line ቹ of error 
REPORT Prints error mesage 

ON ERROR Frogrmmable error handling routines 

FREE . Sets free space pointer for DIMs ete 


FRINTTAE CX) Tabs printer 

FPRINTTAB(CX,Y) Tabs sereen im X and Y coordinates 
FFERINTTAE As above in FeFe 

SHIFT E” Allows rumber input in binary format 
SHIFT F” Allows mumber input in base 4 





























New Graphic Functions 
These are too involved to be fully explained here, but allow 
shapes to ከ፳ defined, inverted, and moved about, in colour or 
ERW, 


Additional Error Messages 


48 mew error messages are added to cope with the new commands. 


Summary 
The Superbasic kit seems good value. Tt provides mary 
“standard basic commands and some interesting graphics. Tt 


duplicates 9 of 21 commands in the original Toolkit. As most of 
the commands in the original Toolkit were concerned with the 
entering of programs, or manipulating same, @sa. AUTO, RENUM, 
TRACE, etc., it could be used with the Superbasic Toolkit via a 
ROM switch, which would give you a very powerful BASIC; without 
same of the limitations, (memory map problems, etc.) as imposed 
by the B.E.C. board. Now if only someone would come up with @ 
sensible ዮን ኮን ROM that didn’t prirt vil as 1,፥00000005-፦1፤!!፤ 


If anyone would lice a copy of the instructions for the 
Superbasic Toolkit for perusal prior to considering purchase of 
same, send me $1.00 for postage, (it’s 26 pages!), and XY will 
send it to you, My address ist 

CR. Zinek. 

Lewis Lake, Reh. #3 

Armadale, N.S. 

B3L 453 - 
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- Time? 01/30/84 052397235 
From? Fred Springer CKYD) 


The Halton Acorn Users’ Group met on Tuesday, January 24, 1984 
at St. Mark’s School on Upper Middle Road in Burlington. There 
were 8 few mew programs available written by some of the 
members. In particular, we were able to see a copy program 
-which would copy files from one diskette to another. 


The ‘hardware’ fellows also showed off some of their new 
goodies which included a RS232 board. As well there was some 
discussion of making available a board or kit so that a disk 
could be made up. 


Also available that night was a Disassembler/Assembler /Debug 
chip desiened by Alan Hepburn. We didn’t get a chance to see 
it as time was getting late but those who have seen it say it 
is a neat little package well worth the price that Alan is 
asking for it. You may contact him if you are interested. 


The next meetings will be held on Feb. 21 and Mar. 27, 1984, 
Meetings begin at 7330. We nope that you can attend, 








La ERIC 
An All Canadian Utility ROM 


DEBUG is a new utility ROM which does for the assembler prog- 
Trammer what Tool-Box does for the worker in BASIC. Supplied as a 
4 k EPROM (2532) it is inserted in IC-24 socket and entered with 
the command LINK #A000. It comes with excellant documentation 
which includes examples in addition to easy to follow instruct- 
Long, DEBUG 35 menu driven and fully promted. When it is entered 
a ስፎበህ of six options appears? 


19 INTERACTIVE DISASSEMBLY /DUMF 
ፎን DISASSEMBLE TO PRINTER 

3) DISASSEMBLE TO SOURCE CODE 
4) BYTE SEQUENCE SEARCH 

J) DUMF TO FRINTER 

6) ASSEMBLER LANGUAGE TRACE 


On typing 1 the screen shows two boxes with the prompt ADDRESS? 
All addresses are assumed to be in hex and there is ከ6 need to 
type "ën, Wher entering the starting address to be disassembled 
DEBUG will only accept valid hex characters plus "DELETE" or 
"RETURN". When the four character address has heen entered the 
promt switches to COMMAND? Pressing "4" Cup arrow) will cause 
one op code to he decoded to assembler mnemonics in the left box 


on the soreer At this stage this box has a bright border 
Bround it. Disassembly can De continued with repeated pressing 
of "an, If shift'*" is pressed ten instructions will be 


decoded. Replying ">" (no shift meeded) will put the bright 
border aground the right hand box. Pressing "4" mow causes the 
contents of the mext location to he shown in hex in the second 
box together with the ASCII equivalent if applicable. Again 
pressing shift "4" dumps the contents of ten locations. When in 
dump mode pressing "e" causes a back-step to show the contents 
of the previous location. Fressing “return at any stage takes 
you to the previous prompt. For example if it is pressed whilst 
stepping through 8 dump then DEBUG promts for a new address, 
Fressing "RETURN again will step beck to the main menu and a 
third "RETURN" causes an exit back to BASIC. When using option 
4 typing Han or "ኗ" will switch from disassembly to hex/ASCIT 
dump and vice versa, 


Option 2 allows a specified block of code to be disassembled arid 
printed out. 


Option 3 allows code to be disassembled and stored in æa 
specified block of memory where it can be read and run under 
BASIC. This allows relocation of code by changing the variable 
P, References within the range decoded are assigned the labels 
EEO to Bn, It 35 necessary only to add the appropriate DIM 
statement then run the program twice to generate the relocated 
code. 


Option 4 allows a specified range of memory to be seanned tur 8 
string specified in either hex bytes or ASCII, This time ">" and 
"2" switch to ASCII and back to hex. 





Option 3S. provides for a dump of memory locations to a printer. 
This is printed out as 16 hex bytes per Line with the ASCII 
alongside. 


Option 6. is a very mifty trick which allows single stepping 
through machine code. After setting the entry point you are 
prompted for the entry conditions and can set each register and 
the fleas. 


This is all very meat, however some care has to be taken. DEBUG 
itself uses some zero page addresses from ##A0 up and #210 up. 
If the trace is rum ዕስ code which uses these same locations 
there will be confusion. Similarly aif you try to single step 
through operating system subroutines which are used be DEBUG you 
Will get into trouble. To get round this last diffieults, if 
TRACE encounters a subroutine located above APEEF this is 
executed mormally returning control to DEBUG when the subroutine 
call is complete. ። 


The ATOM is way ahead of other small computers in the built in 
ability to handle assembler language and to teach fundamental 
machine operation. With this enhancement you will be able to 
write more code faster and more accurately. Unless you are 8 
professional programmer you probably find that you spend much 
more time debugging your machine language programs than they 
took’ to write in the first place. DEBUG is a tremendous help. 


DEBUG is available from} 
A» Hepburn 

RRES ፤ 

. Georgetown, ONT. 

L7G 486 


Because of the present unstable situation in the price of chips 
Alan is offering it for a cost of $30 if you supply the blank. 
chip. A 2532 which must be by Texas Instruments is required. 
(This requirement results from a quirk in the ROM blasting board 
which Alan built for his Atom). 


BES NUMBERS 


If you do get your Atom on line, here are a few telephone mumbers 
to try. Only those in Ontario have been tested, 

(4146) 632-5653 Burlington (416) 423-5149 ETI; Torornto 
(416) 324-1973 HACK, Hamilton (S19) 759-3515 Brantford 

(604) 738-2773 CoCo, Vancouver (403) 287-3638 Shop, Calgary 
(2704) 942-1109 VE4, Wirinipes (514) 622-1274 ርዕስስ80›ህ Montreal 


Many of these boards operate only from evening to morning, and 
there is mo guarantee that they are still in operation. 








The following message was downloaded from the ETI BULLetin board 
in Toronto, It refers to the article "Getting On Linen in NL~-#4, 


Message 22 is from DREW NISBET, to JOHN WOOD, 
It’s about ከ8232 FOR ATOM. 


John? 
The errors in the schematic were 


1) The pins on the 1489 are backwards. 
Those shown 85 inputs are outputs and vice versa. 


23) Fin 26 om the 6551 should not be connected 
to the expansion port of the ATOM (line 28). 


3) The chip select lines for the 6551 are 
incorrect. Line 27 of the Bus Extension should 
be directly connected to pin 2 of the 6351. The 
output of the 74.8260 should be input to the 
7ብ4.804 and the output of the 74.9504 showld be 
conmected to pin 3 of the 46551. 


I hope this information will help. In addition, 
any lines which are not available for any specific 
MODEM must be tied either high or low depending 

on the default value for the signal concerned 

(not just left unconnected). 


Drew. 


Note that the above refers to the original article in 
Info-Age. Item (14) had Deen corrected in the version given 
in NL-#4, 


OKIOK KKK K KKK KK 


WORD PROCESSOR TRICKS 


The Atom word processor ROM is a wondrous little fellow 
indeed: apart from the display, he is almost a match for 
those fancy disc based jobs on other machines. ፲ say 
almost because, in theory, one can only supply control codes 

to the printer at the beginning of lines, meaning single-word 
italics, emphasis or underlining are out. Now 

my Gemini 108 is dying ta do all that stuff (and more), so 

it goes without saying that being unable to directly address the 
beast in the middle of a line has proved frustrating to say the 
Least. 


You have the same frustrations too? You hate the fact that 
it is impossible to introduce printer commands in mid-line? 
Have a close look at the previous paragraph and this one. 
AHA! Here`s the trick: 





First, enter your text in a straightforward way, with formattin 
set, but no attempt to enter control codes (the word processo 
doesn’t recognize them in enter mode). Run a hard copy, if yo 
wish, to decide just where underlining, italics, etc. will be 
needed. Don*t get carried away: too many special effects wil 


1 
make a letter look like ል dog’s breakfast. Insert the proper 


<ESC> codes before and after the word you have chosen to change 
substituting a seldom-used character, such as <*> (shifte 
up-arrow) for the <ESC? character. Actually, any character no 
used in the text will do. 


Next, do a search and replace, substituting the escape code (27 
for the stand-in. For example, if I choose to italicize the wor 
"italics", first I must surround it with the proper select an 


deselect italics code (in this case for the Gemini; other 


printers will have other sequences): ”“ዓዳ1ቲ8]1]13ርፍጨ”5, Next, I wil 


enter the word pack command ES, thus: F\*\SESC?\a. Use CTRL-L to 


print code 27 (ESC). 


Now you will see why I take this somewhat round-about rout 
instead of simply inserting <ESC> where needed. The displa 
becomes very corrupt. It obviously hates characters it canno 
print but which exist in letter count. It becomes angry. Th 
cursor gets lost and starts crying. Leave all your. playin 
around until the VERY end. Corrupt as it is, the mean, nast 
display cannot affect your wonderful artistic printout. 


Now, I hear you asking, "What’s the catch? What are the limit 
on my creativity here? Can you really hear me asking this? Wha 
am I doing talking like this?" Okay. Justification is messed u 
by the countable but unprintable control codes. The first tw 
paragraphs of this article are in theory justified! You can us 
this technique to enter any Control code except CTRL-& 
CTRL-C, which the Atom refuses -to send to the printer. Also, i 
you set THFE=0, you will be unable to get any reaction to CTRL 


D 
fa bh "3 


from the printer, and since the NUL string sometimes is useful, 
why not set ?#FE=53, since it isn’t going anywhere, anyway, 


anyhow? Secondly, printer commands which require numbers, fo 
example, one which would set a one time line feed of x line 
will need a control character representing the number require 
ie: CTRL-D for the number 4, and if you want to send the number 


2 or 3, forget it. For that matter, forget anything over numbe 
51, because you aren*t going to call it up from the keyboard. 


So there it is: a handy trick not to be overdone, but adding a 


useful extra to the very useful word processor ROM. As for me 
all this typing has made me thirsty, so 1”11 just turn off th 
Atom and have a glass of good ald H20. Cheers! 





John Lasruk, 
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DOS UTILITIES 


Several useful DOS utilities have been sent to the Users’ Group. 
Three listed here are originally by Alan Hepburn. Note that as 
written they require memory expansion above #4000. Note also bhat 
they contain self modifying code and some sections must ከፎ 
entered exactly as printed. 


FILCOPY 


LOREM COPY A FILE USING A SINGLE DISK DRIVE 

LiREM CONTAINS SELF MODIFYING CODE 

L2ZREM ENTER EXACTLY AS TYPED 

427ች[=0 i PRESSE ነ ?ቆ23።፡፡0 i ?ቕ።ዳ=ቆ2ኮ 

2001ቨ8532 , ከ32 , 02 4 ሀ=0 ፥)5።ቆዳ000 

ZP, “ርዐዮኘ፲ክዕር A SINGLE FILE" "USING THE DEFAULT DRIVE?” 
JOIN. "FILE NAME $S 

JIP INSERT SOURCE DISK VAND FRESS SPACE Bopi: 

SZLINKSFES 4 

BAXIR 

49ርዐ!፥፲ሦ F3G.100 

50ዮ› "NOT FOUND" “፥ፎ፥ 

LOOF =) +#100 

4307ቆሶሰኗሯ።ኃ”ፅ 4 PHARQEF OZ REM LST SECTOR 
LZ0P°#A0=0 5 ግ9ቆጳ፲። CF PS AL REM ቐ OF SECTORS 
LOOPEOCHE ነ, ግቁሄር።ፎጅ/ ደ REM BUFFER 
LAQLINKSE7 SES LINKEESABS REM READ THE FILE INTO BUFFER 
፲ዓፎቆአከ።፡ "ሄጀይልህኤክ” “ሕጀጀቓቹ KX KK XXXX XXXX" 
L44Le25 Ge CF P+ CF 24) 

L45?Q@?F SQ?PL=FPLSREM STARTING POINT 
L46A=F 933 ፲=ሯዓ 4605 .x 

L48A2F PZ GU, H 

LSOF. "INSERT TARGET DISKU PAND PRESS SPACE BAR"? 
L60LINK#EFES4 

L9OF .T#=OTOGZNPCL4+6) SPIN. 
200ፅ፡፡ሯ/ደ56 , T=14;605.x 

21 0ፅ6።፡=ዲቕዮዮ 5, 605 5 

2208፡፡፡5+1. 5 A=B/256;,7T"19 4 505 ,5 

230ፅል፡፡5ጸቕዮዮኮ PCOS sx 

2900246 

üJ ZI kPt E , ፲መዐፐዐ LENN  PUENPT Set oN, 
SLOXSAVE"FILCOPY'4000 4000 2000 

3LS*DIR 

320COS.FIFHRF +1005 PF PQ SF PLO? 
S30LINK#E7SESLINKBE7Z4ASP.UOK' SE. REM WRITE INDEX 
LOOOTIFLENS?4;6-.1005 
1003F.T=LENS TO ይ ነ) 871=ቅ20.፥ክ፥ 
1 0025577=80 4, ”=0 
10140 ፻ ,፲መቓቐ2ሯዐዐፀ TO#ZO000+?7#2Z105 STEF 8 
4 020፻ › ህ=0ፐ02 ፌ, ክንህ=።፲7ህክ)› NPZ =D 
14030፲ኮዮቆ5።ቆስክ ፥=፲ 
ቷ1ዐቶዐአክ,ን፥ክ- 
44 00;፡ር=ል/፲ ፅተቅቐ30 ,505.3120 
1ቷ።2ዐር።(ልደቆዞዮን፥ቅጋ3ዐ ፥ርብ51450 
ፈቷዓዐክን 

1450፲፻ር=ችቓ3 3 C=C+7 
14ሪ60ከ72፲።=0 ነ እ=፲ተ+1 48) 








RENAME 


LOREM RENAME DISC FILE 
12 790)=0 4 7ቆር።=2ዞ ፤7ቆ23=፡0 7? 7ቆ24፡፡ቆ2ዞ 
Z0DIMS32 , N32 
30፲አዘ, "OLD ክልዘዩ"ቆ8 
BARD IR 
2008, PIF EC, 100 
50ዞ, 7 "MOT FOUND" LE, 
400፲ከ, NEW NAME" $s 
LOSTFLENS?73F. “"ፐዐ0 LONG’ 36.100 
1100F} GOS, የ፤፲፻ (ዮ<:-በ ) IP, “"ፐ፲አ ህ8፻" 5,100 
420፻ ,፲=0ፐዐ LENS =] 
14 300ዐ7፲።=87፲ 
LAON. IF ፲።=27፤6, 1ፊ0 
LSOF ,፲=፲ TO 7407፲፡ቕ204ንክአ, 
1601.1ክዞ8ቆ፻758 41. ፲ክቪቆዩፖዳል፤ዩ , Dk EE, 
LOOQOTF.T=LENS TÜ 6)657፲=ቆ20፤አከ, I 877=ቕ0 
14 005ዮ=0 
4010፻,፲=ቁ2008 TORZO00+?#2i05 STEP o 
1 020፻ ,.ህ=0ፐ02 ፤ ክግህ=፡፲7,3 ዘ, ፤ክ7ፖ=፡ቆዕ 
LOSOIF&S=$Ni Fey 
LOGON TR, 





DISCOFY 


17ቆ0=0 3 PHESRZE 7 7ቆ23፡፡0 i 7?ቆ2ዳ4፡፡ቆ2ዞ 

5ሀ)3፲ቨ532 ) 80 ፤0=0 - 

410ኮ.ቆ12"ርዐቦኛ WHOLE prige.” 

፲2፲ከ, "ERON DRIVE 0 TO DRIVE 1, Dkmnén 

17 TF PS =CHUN' E, OK, FROM DRIVE 31 TO DRIVE በ0" 
SOTN. “"ጾፎልወኛ"ቆኤ 

40TF as CH" Y" AND S?PLES CHE AND S?P2<> CHS" AND 
SOF. copying"? 7 äs? 

807ቆሃር።፡ጾ ፤ KI e 

907ቆ#ጳ0።=25ሪ60 ፤2#ጳ 1=10 
3190ዐዞ ን፲።ዐፐዐጋቕፍ 
LOSP. "TRACK" TY? 
41 0ሮቆጳሯ።፡፲/25ፊ ፤ 2ቁል3=፲ 
ቷ2ዐፀ፲ዞዐዕ።ዐ ፤ጾዐ፳ንዐ 
3 ሯ፲ዞሀ።1 ፤ XDR. ጊ 
L30LINK#E7SE3 LINK#E 443 
L40IFD=0} «DR. 4 
1 ዓጅ፲ዞሁር፡ኋቷ ፤ xDR. 0 
LSOLINK#E75E ሮ፤ፈዚ፲ክክጀሂቆጅሪጾ0 
LEON. $ Fe "OK" Ee, 


€ ፥ [ose 1 


5ሙ3ኗ>#ሀ1፻, 











JOYSTICKS 
Since the early days of the Atom in Canaca, people have plotted 
ways to add a joystick. Scott McLellan of Ottawa hes sent in 
one of the nestest ideas seen so far. He has also included 
routines to allow it to be used in your own program and 8 
machine code patch to convert SNAFFER. Scott uses Point Master 
type joysticks which he bought for $9.95 U.S. They can be used 
on Fort A and Fort PB of the VIA but printer output must ከፎ 
disabled to use Fort A. 
5 REM GAME PADDLES CONTROL 
ተ5,615 40፳=1 28፣ ሃ=ዋ= 
200N ERROR 68. AO 
SOCLEAR4 
407 RH BSOC=#00 
GT ፡) 507#B802=#00 
yP ( 247) 60AR=7#EB00 
70GOS.AsPLOTL4, X.Y 
RIGHT (251 ) 806. 60 
231Y=Y+1; ፳=፪፳-1 ፤ R., 
OOWN (253 ) 237X=X-1:Y=Y-i:R. 
25ዋ፪=ጂዚ-1 84, 
FIRE. (254) Z4ASXEX+ ፳፪ Y=Y+i; R. 
247Y=Y+1;R. 
VIA CONNECTION POINT masTER 245 ደ=፪+1 48 Y=Y-1 R. 
PORT B Joy stick 251X=X+1;R, 
4 PIN CONNECTION ።5=ሃ=ሃ-158. 
© VOLTS 254CLEAR4; R. 
255R. 
ONLY THE LOWER SBITS OF PorT ይ ON THE VIA CHIP ARE VSEO 
45° MOVEMENT 5 POSSIBLE 
CANNOT BE USEO IN PORT A AT THE SANE TINIE AS A PRINTER 
MACHINE CODE FATCH TO SNAFFER FOR JOYSTICKS 
3800 ጀለ 381D EA 383A EA 3860 FO QE 
Saal E 381E EA 3835 AD 03 58 3862 40 00 
3902 ጀል B81F EA 3835 29 02 3864 ዳር 67 38 
3803 EA 3820 AD 03 58 3840 CD F7 28 3867 GC F3 28 
3904 EA 3823 29 04 3843 FO OC 386A AP 90 
3805 AD 01 ጾ8 3825 CD Fó 28 3845 8D F7 28 386C 8D 00 EQ 
3808 29 10 3828 FO QC 3848 C? 02 386ኮዞ An 
380A CD F4 28 382ፅ 85 Fá 28 38ዳጳ FO 05 
e Fo oc 3820 ርቐ 04 3840 A0 03 
80 85 F4 28 382F FO 05 38ዓ፻ ዳር 6&7 38 
39144 FO 05 3833 ዳር 47 38 3854 29 08 
3816 op 01 9936 EA 3856 CD Fo 28 
3818 4C 67 38 - 3837 EA 3857 FO 15 
3818 EA 3838 EA 38:38 80 FS 28 
38140 EA 3839 ጀል . 3855 ርፍ 08 








QUERY 7 


Edouard Dion wants to know if be can use a QumeTrack double sided 


disk drive with his Atom. The Qume uses 20 ms track to track hea 


4 


access Line, Write to him at 3160 Riviere ር፳ሮከፎፎቱዕ Boigsbrianc, 


Quebec, J7H LEZ. or pass the information to all of us throuah the 


Newsletter. 


Si 


If angbody ከ85 date on the R46591 ACIA chip please send it to ክፎ 


SAF. I need it desperately!!! 
Colin Hinz 1118 College Dr. Saskatoon, SASK. S?7N OW2 


FOR SALE 


ATOM 12K + 12K, COLOUR BOARD, 4 POSITION ROM SEL. BOARD, TOOL-KIT|& 


WORD-FACK, VIA & PRINTER INTERFACE. ALL BUFFERS, PNP SUFF, AT. &F. 
Package? $450 or will sell separately for 30% off retail prices. 
Grant Mckenzie 2506 Kenney St. Terrace &.0. VBG BEZ, ‹ይዐዳ) 635-2547 


Acorm Atom ~ 12K RAM + 12k ROM, Pwr Supply, Toolbox, Printer inter 


face, External tus expansion, Software Cineluding Forth), & Books. 
$400, Steve Gibsons LiZl Spears Road, Fort Eria, ONT.» LZA 4N2 
Fhone? (414) 871-3265 ፦፦ after dpm. ይ 


ACORN ATOMS 16K RAM, 128 ROM, ROAM EOQARD, “ATOMCALC, TOOL EOX, 


MONITOR ዐህፐኮህፐን COLOUR BOARD, FOWER SUPPLY, 
SOFTWARE? CHESS, ATOMSTORE, LOTS OF GAMES, MISC FROGRAMS, 3 BOOKS. 
Doug McLaren, Box ዕፅ Smithville ONT, LOR 240. (416) 957-7761 


ATOM 1Z+12, B&W, SUPERBASIC, BEC CARD, EXPANSION UNIT C/W ESP, BOARD 


14K TIMEDATA MEM., MDPS, ፐን ፐኦ›ኘኦሱ ፲ንወ፥6 ALL SCHEMATICS, ALL AVAIL 
BOOKS, S/WARE INCLUDES DISASS., GOLF, DATABASES, ELIZA ETC. VAL $90 
SELL FOR $450. Re ZINCK; LEWIS LAKE, RRI ARMDALE N.S. BSL 443. 


COLOUR BOARD $40.00 
del. Termeulen, ኮክ8ቹዓ Trenton, ONT. (L3) 392-9864 after 6pm. 


= 
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Erand New (factory replacement) BEC/Atom Disk Drive. Complete with 
3" connecting cables. Great for use as a second drive, or use with 


an FDC card for a starter drive. $270.00 0.8.0. 
Colin Hinz 341448 College Dr, Saskatoon, SASK. SZN 082 


Hundreds of 2114. memory chips! Guaranteed to work, only $1.10 esch 


or ten for $10.00 Also selling, hundreds of other TTL, MOS, ar 
linear chips (not all tested though). Send SASE for free list. 
Colin Hinz 34438 College Dr. Saskatoon, SASK, SZN 0W2 


64k Duo 4 Memory expansion board. Never installed; but sold as is. 
Leds Howarth 3-2242 Upper Middle Ed, Burlineton, ONT. LZP 22# 
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Non commercial advertisements, which are published free of charge 
can only be sccepted from current members of the Users’ Group and 


will be restricted to a maximum of 4 lines, 


NOTICE ~ 


The Halton Acorn Users’ Group continues to meet on the third Tuesday 
im each month at St. Mark’s School on Upper Middle Road im 
Burlington, ONT. EUT! mote change for March when ait will be the 


fourth Tuesday due to Winter break. 





